﻿Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub TextBox2_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TB_Two.TextChanged

    End Sub

    Protected Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TB_One.TextChanged

    End Sub

    Protected Sub Sum_Click(ByVal sender As Object, ByVal e As EventArgs) Handles TotalySum.Click
        Dim x As Single
        Dim y As Single
        x = CSng(TB_One.Text)
        y = CSng(TB_Two.Text)

        Dim TSum As Single
        TSum = x + y

        LB_Result.Text = "The Sum is " & TSum
    End Sub
End Class